home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Everything For A Hacker
/
19990506-[HACK].iso
/
HEXEDIT
/
BIED.1_0
/
bied.exe
/
0
/
RCDATA
/
TFRMMAIN
/
TFRMMAIN.txt
Wrap
Text File
|
1998-09-29
|
24KB
|
802 lines
object FrmMain: TFrmMain
Left = 239
Top = 108
Width = 424
Height = 352
Caption = 'Binary Editor'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
Menu = MnuMain
Position = poDefault
ShowHint = True
OnActivate = FormActivate
OnCloseQuery = FormCloseQuery
OnCreate = FormCreate
OnDestroy = FormDestroy
OnResize = FormResize
PixelsPerInch = 96
TextHeight = 13
object PanReclama: TPanel
Left = 0
Top = 37
Width = 416
Height = 185
Align = alClient
BevelInner = bvRaised
BevelOuter = bvLowered
TabOrder = 4
object LblTop: TRxLabel
Left = 2
Top = 2
Width = 412
Height = 10
Align = alTop
AutoSize = False
end
object LblIntro1: TRxLabel
Left = 2
Top = 12
Width = 412
Height = 14
Align = alTop
Alignment = taCenter
AutoSize = False
Caption = 'This software is created with use'
ShadowColor = clWhite
ShadowSize = 0
WordWrap = True
end
object LblTitle: TRxLabel
Left = 2
Top = 46
Width = 412
Height = 28
Align = alTop
Alignment = taCenter
AutoSize = False
Caption = '"TAKHexEdit"'
Font.Charset = RUSSIAN_CHARSET
Font.Color = clRed
Font.Height = -19
Font.Name = 'Times New Roman'
Font.Style = [fsBold]
ParentFont = False
end
object LblWWW: TRxLabel
Left = 2
Top = 74
Width = 412
Height = 18
Hint = 'http://www.raid.ru/customers/ankol'
Align = alTop
Alignment = taCenter
AutoSize = False
Caption = 'Go to TAKHexEditor Home Page'
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlue
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = [fsUnderline]
ParentFont = False
ShadowColor = clWhite
ShadowSize = 0
OnClick = LblWWWClick
OnMouseEnter = LblWWWMouseEnter
OnMouseLeave = LblWWWMouseLeave
end
object LblEMail: TRxLabel
Left = 2
Top = 92
Width = 412
Height = 18
Hint = 'ankol@perm.raid.ru'
Align = alTop
Alignment = taCenter
AutoSize = False
Caption = '� 1998 Andrey Kolegov'
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlue
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = [fsUnderline]
ParentFont = False
ShadowColor = clWhite
ShadowSize = 0
OnClick = LblEMailClick
OnMouseEnter = LblWWWMouseEnter
OnMouseLeave = LblWWWMouseLeave
end
object LblIntro2: TRxLabel
Left = 2
Top = 26
Width = 412
Height = 20
Align = alTop
Alignment = taCenter
AutoSize = False
Caption = 'Delphi visual component'
ShadowSize = 0
end
end
object StatusBar: TStatusBar
Left = 0
Top = 287
Width = 416
Height = 19
Panels = <
item
Alignment = taCenter
Width = 50
end
item
Alignment = taCenter
Width = 100
end
item
Width = 50
end>
SimplePanel = False
end
object ToolBar: TPanel
Left = 0
Top = 3
Width = 416
Height = 34
Align = alTop
BevelOuter = bvNone
TabOrder = 0
object SbOpen: TSpeedButton
Left = 27
Top = 3
Width = 25
Height = 25
Hint = 'Open file'
Flat = True
Glyph.Data = {
F6000000424DF600000000000000760000002800000010000000100000000100
0400000000008000000000000000000000001000000010000000000000000000
8000008000000080800080000000800080008080000080808000C0C0C0000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888
88888888888888888888000000000008888800333333333088880B0333333333
08880FB03333333330880BFB0333333333080FBFB000000000000BFBFBFBFB08
88880FBFBFBFBF0888880BFB0000000888888000888888880008888888888888
8008888888880888080888888888800088888888888888888888}
OnClick = MnuOpenClick
end
object SbWin: TSpeedButton
Left = 162
Top = 3
Width = 25
Height = 25
Hint = 'ANSI'
GroupIndex = 1
Down = True
Flat = True
Glyph.Data = {
36030000424D3603000000000000360000002800000010000000100000000100
1800000000000003000000000000000000000000000000000000C0C0C0C0C0C0
C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
C0C0C0000000000000000000C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
C0C0C0C0000000C0C0C0C0C0C0000000C0C0C0C0C0C0C0C0C0C0C0C000000000
0000000000C0C0C0C0C0C0C0C0C0000000000000000000C0C0C0C0C0C0C0C0C0
C0C0C0FF0000FF0000C0C0C00000000000000000000000000000000000000000
00000000000000C0C0C0C0C0C0FF0000C0C0C0C0C0C0FF0000FF000000000000
0000FF000000000000000000000000FFFF000000000000C0C0C0C0C0C0FF0000
C0C0C0C0C0C0C0C0C0C0C0C0000000000000FF0000FF000000000000FFFF00FF
FF000000000000C0C0C0C0C0C0C0C0C0C0C0C00000FF0000FFC0C0C000000000
0000000000FF000000000000FFFF000000000000000000C0C0C0C0C0C00000FF
C0C0C0C0C0C00000FF0000FF0000000000000000000000000000000000000000
00000000000000C0C0C0C0C0C00000FFC0C0C0C0C0C0C0C0C0C0C0C000000000
00000000FF00000000000000000000FF00000000000000C0C0C0C0C0C0C0C0C0
C0C0C00000000000000000000000000000000000FF0000FF00000000FF0000FF
00000000000000C0C0C0C0C0C0000000C0C0C0C0C0C0C0C0C0C0C0C000000000
00000000000000FF00000000FF00000000000000000000C0C0C0C0C0C0C0C0C0
C0C0C0C0C0C0C0C0C0C0C0C0C0C0C00000000000000000000000000000000000
00000000C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
C0C0C0C0C0000000000000000000C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0}
Layout = blGlyphRight
Spacing = 2
OnClick = MnuWinClick
end
object SbDos: TSpeedButton
Left = 187
Top = 3
Width = 25
Height = 25
Hint = 'OEM'
GroupIndex = 1
Flat = True
Glyph.Data = {
36030000424D3603000000000000360000002800000010000000100000000100
1800000000000003000000000000000000000000000000000000C6C6C6000042
0000420000420000420000212100004200214200214200210021210042420042
42002121000000C6C6C60000000000DE0000BD0000BD0000BD00009C5A0021BD
005ABD005A21212100848400BDBD00BDBD009C9C0063630000000000000000FF
0000FF0000FF0000FF0000FF00005ABD00397B0039009C9C00FFFF00FFFF00FF
FF00FFFF009C9C0000000000000000FF00007B00000000000039007B0000DE00
002100000000DEDE00BDBD39000000000000BDBD00FFFF0000000000000000FF
00007BC6C6C67B00399C003900007B00007BC6C6C6000000420021FF007B0021
2100DEDE00FFFF0000000000000000FF00007BC6C6C67B0039BD005A00007B00
007BC6C6C6002121420021FF007B007B7B00BDBD003939C6C6C60000000000FF
00007B0000007B0039BD005A00007B00007B00000000DEDE420021FF007B0000
00000000000000C6C6C60000000000FF0000BD00008439005ADE005A21005A00
003942002100FFFF2139397B0039000000007B7B009C9C0000000000000000FF
0000FF0000FF00009CBD0039FF007BFF007B9C003900BDBD00FFFF00FFFF00FF
FF00FFFF00BDBD00000000000000007B00007B00007B00007B0000217B00397B
00397B0039210000007B7B007B7B007B7B003939000000C6C6C6C6C6C6636363
424242000000949494313131000000A5A5A50000003131319494946363639494
94737373000000C6C6C6C6C6C6636363424242313131848484949494000000A5
A5A5000000313131313131C6C6C6313131A5A5A5000000C6C6C6C6C6C6636363
424242949494212121949494313131A5A5A50000000000003131316363638484
84212121C6C6C6C6C6C6C6C6C6636363949494848484000000313131B5B5B5A5
A5A5000000636363636363000000000000000000000000C6C6C6C6C6C6636363
C6C6C6212121C6C6C6000000949494A5A5A50000006363637373730000003131
31A5A5A5000000C6C6C6C6C6C6313131525252000000C6C6C6C6C6C631313152
5252000000000000313131636363525252000000C6C6C6C6C6C6}
OnClick = MnuDosClick
end
object SbNew: TSpeedButton
Left = 2
Top = 3
Width = 25
Height = 25
Hint = 'New binary file'
Flat = True
Glyph.Data = {
F6000000424DF600000000000000760000002800000010000000100000000100
0400000000008000000000000000000000001000000010000000000000000000
8000008000000080800080000000800080008080000080808000C0C0C0000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888
888888888888888888888800000000000888880FFFFFFFFF0888880FFFFFFFFF
0888880FFFFFFFFF0888880FFFFFFFFF0888880FFFFFFFFF0888880FFFFFFFFF
0888880FFFFFFFFF0888880FFFFFFFFF0888880FFFFFF0000888880FFFFFF0F0
8888880FFFFFF008888888000000008888888888888888888888}
OnClick = MnuNewClick
end
object SbSave: TSpeedButton
Left = 52
Top = 3
Width = 25
Height = 25
Hint = 'Save file'
Enabled = False
Flat = True
Glyph.Data = {
F6000000424DF600000000000000760000002800000010000000100000000100
0400000000008000000000000000000000001000000010000000000000000000
8000008000000080800080000000800080008080000080808000C0C0C0000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888
8888880000000000000880330000008803088033000000880308803300000088
0308803300000000030880333333333333088033000000003308803088888888
0308803088888888030880308888888803088030888888880308803088888888
0008803088888888080880000000000000088888888888888888}
OnClick = MnuSaveClick
end
object SbCopy: TSpeedButton
Left = 82
Top = 3
Width = 25
Height = 25
Hint = 'Copy'
Enabled = False
Flat = True
Glyph.Data = {
42010000424D4201000000000000760000002800000011000000110000000100
040000000000CC00000000000000000000001000000010000000000000000000
8000008000000080800080000000800080008080000080808000C0C0C0000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888
8888800000008888888888888888800000008888888444444444800000008888
8884FFFFFFF48000000088888884F00000F48000000080000004FFFFFFF48000
000080FFFFF4F00000F48000000080F00004FFFFFFF48000000080FFFFF4F00F
44448000000080F00004FFFF4F488000000080FFFFF4FFFF44888000000080F0
0F04444448888000000080FFFF0F088888888000000080FFFF00888888888000
0000800000088888888880000000888888888888888880000000888888888888
888880000000}
OnClick = MnuCopyClick
end
object SbPaste: TSpeedButton
Left = 107
Top = 3
Width = 25
Height = 25
Hint = 'Paste'
Enabled = False
Flat = True
Glyph.Data = {
4E010000424D4E01000000000000760000002800000012000000120000000100
040000000000D800000000000000000000001000000010000000000000000000
8000008000000080800080000000800080008080000080808000C0C0C0000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888
8888880000008888888888888888880000008888888444444444480000008800
0004FFFFFFFF4800000080737374F000000F4800000080373734FFFFFFFF4800
000080737374F000F4444800000080373734FFFFF4F48800000080737374FFFF
F448880000008037373444444408880000008073737373737308880000008037
00000000770888000000807708888880730888000000803730B00B0737088800
00008800000BB000008888000000888888000088888888000000888888888888
888888000000888888888888888888000000}
OnClick = MnuPasteClick
end
object SbClear: TSpeedButton
Left = 132
Top = 3
Width = 25
Height = 25
Hint = 'Clear'
Enabled = False
Flat = True
Glyph.Data = {
42010000424D4201000000000000760000002800000011000000110000000100
040000000000CC00000000000000000000001000000010000000000000000000
8000008000000080800080000000800080008080000080808000C0C0C0000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888
8888800000008888888888888888800000008880888888888808800000008800
0888888888888000000088000088888880888000000088800088888808888000
0000888800088880088880000000888880008800888880000000888888000008
8888800000008888888000888888800000008888880000088888800000008888
8000880088888000000088800008888008888000000088000088888800888000
0000880008888888880880000000888888888888888880000000888888888888
888880000000}
OnClick = MnuClearClick
end
object PanExit: TPanel
Left = 384
Top = 0
Width = 32
Height = 31
Align = alRight
BevelOuter = bvNone
TabOrder = 1
object SbExit: TSpeedButton
Left = 5
Top = 3
Width = 25
Height = 25
Hint = 'Exit'
Flat = True
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
0400000000000001000000000000000000001000000010000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00330000000000
03333377777777777F333301BBBBBBBB033333773F3333337F3333011BBBBBBB
0333337F73F333337F33330111BBBBBB0333337F373F33337F333301110BBBBB
0333337F337F33337F333301110BBBBB0333337F337F33337F333301110BBBBB
0333337F337F33337F333301110BBBBB0333337F337F33337F333301110BBBBB
0333337F337F33337F333301110BBBBB0333337F337FF3337F33330111B0BBBB
0333337F337733337F333301110BBBBB0333337F337F33337F333301110BBBBB
0333337F3F7F33337F333301E10BBBBB0333337F7F7F33337F333301EE0BBBBB
0333337F777FFFFF7F3333000000000003333377777777777333}
NumGlyphs = 2
OnClick = MnuExitClick
end
end
object PanSep2: TPanel
Left = 0
Top = 31
Width = 416
Height = 3
Align = alBottom
BevelOuter = bvLowered
TabOrder = 0
end
object CbAddr: TComboBox
Left = 218
Top = 3
Width = 79
Height = 21
Hint = 'Address'
ItemHeight = 13
TabOrder = 2
Text = '0'
OnClick = CbAddrClick
OnKeyPress = CbAddrKeyPress
end
end
object PanSep1: TPanel
Left = 0
Top = 0
Width = 416
Height = 3
Align = alTop
BevelOuter = bvLowered
TabOrder = 1
end
object PanEdit: TPanel
Left = 0
Top = 222
Width = 416
Height = 65
Align = alBottom
BevelOuter = bvNone
TabOrder = 2
Visible = False
object HexEdit: TAKHexEdit
Left = 0
Top = 21
Width = 416
Height = 44
Cursor = crIBeam
Align = alClient
BorderStyle = bsSingle
Font.Charset = RUSSIAN_CHARSET
Font.Color = clWindowText
Font.Height = -15
Font.Name = 'Courier New'
Font.Style = []
TabOrder = 0
TabStop = True
AllowSelection = True
HeaderControl = HexHeader
PersistentSelection = False
ReadOnly = False
Version = '1.01'
OnKeyDown = HexEditKeyDown
OnChangeAddress = HexEditChangeAddress
OnChangeData = HexEditChangeData
OnChangeSelection = HexEditChangeSelection
OnChangeParams = HexEditChangeParams
end
object HeaderBar: TPanel
Left = 0
Top = 0
Width = 416
Height = 21
Align = alTop
BevelInner = bvLowered
BevelOuter = bvNone
BorderWidth = 1
TabOrder = 1
OnResize = HeaderBarResize
object HexHeader: THeaderControl
Left = 2
Top = 2
Width = 412
Height = 17
Align = alClient
Font.Charset = RUSSIAN_CHARSET
Font.Color = clWindowText
Font.Height = -15
Font.Name = 'Courier New'
Font.Style = []
Sections = <
item
Alignment = taCenter
MaxWidth = 55
MinWidth = 55
Width = 55
end
item
Alignment = taCenter
AllowClick = False
MaxWidth = 4
MinWidth = 4
Width = 4
end
item
Alignment = taCenter
AllowClick = False
MaxWidth = 27
MinWidth = 27
Text = '0'
Width = 27
end
item
Alignment = taCenter
AllowClick = False
MaxWidth = 27
MinWidth = 27
Text = '1'
Width = 27
end
item
Alignment = taCenter
AllowClick = False
MaxWidth = 27
MinWidth = 27
Text = '2'
Width = 27
end
item
Alignment = taCenter
AllowClick = False
MaxWidth = 27
MinWidth = 27
Text = '3'
Width = 27
end
item
Alignment = taCenter
AllowClick = False
MaxWidth = 27
MinWidth = 27
Text = '4'
Width = 27
end
item
Alignment = taCenter
AllowClick = False
MaxWidth = 27
MinWidth = 27
Text = '5'
Width = 27
end
item
Alignment = taCenter
AllowClick = False
MaxWidth = 27
MinWidth = 27
Text = '6'
Width = 27
end
item
Alignment = taCenter
AllowClick = False
MaxWidth = 27
MinWidth = 27
Text = '7'
Width = 27
end
item
Alignment = taCenter
AllowClick = False
MaxWidth = 9
MinWidth = 9
Width = 9
end
item
AllowClick = False
MaxWidth = 128
MinWidth = 128
Text = '01234567'
Width = 128
end>
ParentFont = False
OnSectionClick = HexHeaderSectionClick
end
end
end
object MnuMain: TMainMenu
Left = 8
Top = 112
object MnuFile: TMenuItem
Caption = '&File'
object MnuNew: TMenuItem
Caption = '&New...'
OnClick = MnuNewClick
end
object MnuOpen: TMenuItem
Caption = '&Open...'
ShortCut = 114
OnClick = MnuOpenClick
end
object MnuReopen: TMenuItem
Caption = '&Reopen'
end
object MnuSave: TMenuItem
Caption = '&Save...'
Enabled = False
ShortCut = 113
OnClick = MnuSaveClick
end
object MnuSaveAs: TMenuItem
Caption = 'Save &As...'
Enabled = False
ShortCut = 16497
OnClick = MnuSaveAsClick
end
object MnuClose: TMenuItem
Caption = '&Close'
Enabled = False
OnClick = MnuCloseClick
end
object N1: TMenuItem
Caption = '-'
end
object MnuExit: TMenuItem
Caption = 'E&xit'
OnClick = MnuExitClick
end
end
object MnuEdit: TMenuItem
Caption = '&Edit'
object MnuCopy: TMenuItem
Caption = '&Copy'
Enabled = False
ShortCut = 16451
OnClick = MnuCopyClick
end
object MnuPaste: TMenuItem
Caption = '&Paste'
Enabled = False
ShortCut = 16470
OnClick = MnuPasteClick
end
object MnuClear: TMenuItem
Caption = 'Cl&ear'
Enabled = False
ShortCut = 16430
OnClick = MnuClearClick
end
object N3: TMenuItem
Caption = '-'
end
object MnuSearch: TMenuItem
Caption = '&Search...'
Enabled = False
ShortCut = 16467
OnClick = MnuSearchClick
end
object MnuSearchAgain: TMenuItem
Caption = 'Search &Again'
Enabled = False
ShortCut = 16460
OnClick = MnuSearchAgainClick
end
object MnuReplace: TMenuItem
Caption = '&Replace'
Enabled = False
ShortCut = 16466
OnClick = MnuReplaceClick
end
object MnuFill: TMenuItem
Caption = '&Fill...'
Enabled = False
ShortCut = 16454
OnClick = MnuFillClick
end
end
object MnuView: TMenuItem
Caption = '&View'
object MnuDataSize: TMenuItem
Caption = '&Data Size'
object MnuByte: TMenuItem
Tag = 2
Caption = '&BYTE'
Checked = True
RadioItem = True
OnClick = MnuByteClick
end
object MnuWord: TMenuItem
Tag = 4
Caption = '&WORD'
RadioItem = True
OnClick = MnuByteClick
end
object MnuDWord: TMenuItem
Tag = 8
Caption = '&DWORD'
RadioItem = True
OnClick = MnuByteClick
end
end
object MnuCharset: TMenuItem
Caption = '&Encoding'
object MnuWin: TMenuItem
Caption = '&ANSI'
Checked = True
RadioItem = True
OnClick = MnuWinClick
end
object MnuDos: TMenuItem
Caption = '&OEM'
RadioItem = True
OnClick = MnuDosClick
end
end
object MnuFontSize: TMenuItem
Caption = '&Font Size'
object MnuFont8: TMenuItem
Tag = 8
Caption = '&8'
RadioItem = True
OnClick = MnuFont8Click
end
object MnuFont10: TMenuItem
Tag = 10
Caption = '1&0'
Checked = True
RadioItem = True
OnClick = MnuFont8Click
end
object MnuFont12: TMenuItem
Tag = 12
Caption = '1&2'
RadioItem = True
OnClick = MnuFont8Click
end
object MnuFont14: TMenuItem
Tag = 14
Caption = '1&4'
RadioItem = True
OnClick = MnuFont8Click
end
end
object N2: TMenuItem
Caption = '-'
end
object MnuToolBar: TMenuItem
Caption = '&Tool Bar'
Checked = True
OnClick = MnuToolBarClick
end
object MnuHeaderBar: TMenuItem
Caption = '&Header Bar'
Checked = True
OnClick = MnuHeaderBarClick
end
object MnuStatusBar: TMenuItem
Caption = '&Status Bar'
Checked = True
OnClick = MnuStatusBarClick
end
end
object MnuTools: TMenuItem
Caption = '&Tools'
object MnuConvert: TMenuItem
Caption = '&Convert'
Enabled = False
object MnuToANSI: TMenuItem
Caption = 'To &ANSI'
OnClick = MnuToANSIClick
end
object MnuToOEM: TMenuItem
Caption = 'To &OEM'
OnClick = MnuToANSIClick
end
end
end
object MnuHelp: TMenuItem
Caption = '&?'
object MnuAbout: TMenuItem
Caption = '&About'
OnClick = MnuAboutClick
end
end
end
object DlgOpen: TOpenDialog
Filter = 'All files|*.*'
Options = [ofHideReadOnly, ofPathMustExist, ofFileMustExist]
Left = 88
Top = 112
end
object DlgSave: TSaveDialog
Filter = 'All files|*.*'
Options = [ofOverwritePrompt, ofHideReadOnly]
Left = 128
Top = 112
end
object Storage: TFormStorage
IniSection = 'Window'
MinMaxInfo.MinTrackHeight = 200
MinMaxInfo.MinTrackWidth = 340
StoredProps.Strings = (
'MnuDos.Checked'
'MnuWin.Checked'
'MnuFont8.Checked'
'MnuFont10.Checked'
'MnuFont12.Checked'
'MnuFont14.Checked'
'MnuToolBar.Checked'
'MnuHeaderBar.Checked'
'MnuStatusBar.Checked'
'MnuByte.Checked'
'MnuWord.Checked'
'MnuDWord.Checked')
Left = 48
Top = 112
end
object Timer: TTimer
OnTimer = TimerTimer
Left = 168
Top = 112
end
end
